home *** CD-ROM | disk | FTP | other *** search

---

/ Trading on the Edge / Trading On The Edge - CD-ROM Toolkit (Wayzata Technology)(2031)(1994).bin / mac / Mac_Files / Vendor Demos / HiQ / HiQ•Help / HiQ•Help.rsrc / PICT_10703_ODE Initial Value pg 3.png

< prev

next >

Portable Network Graphic  |  1992-04-28  |  78KB  |  816x1056  |  8-bit (256 colors)

Labels: book | chat room | crt screen | monitor | poster | reckoner | sky | windowpane
OCR: ODE IVP SOLVER SAMP CRIPT Example 2. Solve the system of differential equations: dx dx2 dx m2(x+m ) m -m ) X+z('W+Ix)) 3/2 ((x im b+x 3/2 dx4 m2 X 2 m. X ((x1+ m )2 + x2 3/2 ((x m subject to the initial conditions: 10 0.994 20 =0 X 3(0) 40 .00158510637 7908252240 This system describes the motion of satellite about the Earth- Moon system in a special orbit the so-called 'Arenstorf Orbit' restricteo three- body orbit problem Problem Script: Smooth: project ivpEqns, initVector ivpMatrix; local start, finish, stepSize tolerance seqType; start finish .06521656015796255889; stepSize tolerance 10; seqType Function ivpEqns(t XI m1 0.012277471; m2 0-m1 D1 x[1]+m1) 2+x[2] ^2)^1.5; D2 ((x[1]-m2) 2+x[2] 2)^1.5; []tpxp x[3]; dxdt[2] x[4]; [e]spxp x[1]+ +2*x[4]-m2 *(x[1]+m1)/D1 -m1*(x[1] -m2)/D2; dxdt[4 ...

---